home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / gcl-1.000 / gcl-1 / gcl-1.0 / cmpnew / cmpeval.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-10  |  10.0 KB  |  343 lines
  1.  
  2. static L7();
  3. static L8();
  4. static L9();
  5. static L10();
  6. static L11();
  7. static L12();
  8. static L15();
  9. static L22();
  10. static L32();
  11. static L34();
  12. static object LI1();
  13. #define VMB1
  14. #define VMS1
  15. #define VMV1
  16. #define VMR1(VMT1) return(VMT1);
  17. static object LI2();
  18. #define VMB2 register object *VOL base=vs_top; object  V23 ,V22 ,V21 ,V20 ,V18 ,V17 ,V16 ,V15 ,V12 ,V11 ,V10 ,V9 ,V8;
  19. #define VMS2  register object *VOL sup=vs_top+2;vs_top=sup;
  20. #define VMV2 vs_reserve(2);
  21. #define VMR2(VMT2) vs_top=base ; return(VMT2);
  22. static object LI3();
  23. #define VMB3 object  V28;
  24. #define VMS3
  25. #define VMV3
  26. #define VMR3(VMT3) return(VMT3);
  27. static object LI4();
  28. #define VMB4 register object *base=vs_top; object  V32;
  29. #define VMS4  register object *sup=vs_top+2;vs_top=sup;
  30. #define VMV4 vs_reserve(2);
  31. #define VMR4(VMT4) vs_top=base ; return(VMT4);
  32. static object LI5();
  33. #define VMB5
  34. #define VMS5
  35. #define VMV5
  36. #define VMR5(VMT5) return(VMT5);
  37. static object LI6();
  38. #define VMB6
  39. #define VMS6
  40. #define VMV6
  41. #define VMR6(VMT6) return(VMT6);
  42. #define VC7
  43. #define VC8 object  V42;
  44. #define VC9 object  V47;
  45. #define VC10
  46. #define VC11
  47. #define VC12 object  V115 ,V110 ,V109 ,V108 ,V107 ,V106 ,V105 ,V103 ,V102 ,V94 ,V88 ,V85 ,V84 ,V82 ,V81 ,V80 ,V79 ,V78 ,V77 ,V74 ,V71;
  48. static object LI13();
  49. #define VMB13 register object *base=vs_top;
  50. #define VMS13  register object *sup=vs_top+1;vs_top=sup;
  51. #define VMV13 vs_reserve(1);
  52. #define VMR13(VMT13) vs_top=base ; return(VMT13);
  53. static object LI14();
  54. #define VMB14 register object *base=vs_top;
  55. #define VMS14 vs_top += 1;
  56. #define VMV14 vs_reserve(1);
  57. #define VMR14(VMT14) vs_top=base ; return(VMT14);
  58. #define VC15 object  V133 ,V132 ,V131;
  59. static object LI16();
  60. #define VMB16 register object *base=vs_top; object  V146 ,V145;
  61. #define VMS16  register object *sup=vs_top+5;vs_top=sup;
  62. #define VMV16 vs_reserve(5);
  63. #define VMR16(VMT16) vs_top=base ; return(VMT16);
  64. static object LI17();
  65. #define VMB17 register object *base=vs_top;
  66. #define VMS17  register object *sup=vs_top+3;vs_top=sup;
  67. #define VMV17 vs_reserve(3);
  68. #define VMR17(VMT17) vs_top=base ; return(VMT17);
  69. static object LI18();
  70. #define VMB18 register object *base=vs_top; object  V157 ,V156;
  71. #define VMS18  register object *sup=vs_top+5;vs_top=sup;
  72. #define VMV18 vs_reserve(5);
  73. #define VMR18(VMT18) vs_top=base ; return(VMT18);
  74. static object LI19();
  75. #define VMB19 register object *base=vs_top;
  76. #define VMS19 vs_top += 2;
  77. #define VMV19 vs_reserve(2);
  78. #define VMR19(VMT19) vs_top=base ; return(VMT19);
  79. static object LI20();
  80. #define VMB20 register object *base=vs_top; object  V173;
  81. #define VMS20 vs_top += 1;
  82. #define VMV20 vs_reserve(1);
  83. #define VMR20(VMT20) vs_top=base ; return(VMT20);
  84. static object LI21();
  85. #define VMB21
  86. #define VMS21
  87. #define VMV21
  88. #define VMR21(VMT21) return(VMT21);
  89. #define VC22
  90. static object LI23();
  91. #define VMB23 register object *base=vs_top;
  92. #define VMS23 vs_top += 1;
  93. #define VMV23 vs_reserve(1);
  94. #define VMR23(VMT23) vs_top=base ; return(VMT23);
  95. static object LI24();
  96. #define VMB24
  97. #define VMS24
  98. #define VMV24
  99. #define VMR24(VMT24) return(VMT24);
  100. static object LI25();
  101. #define VMB25 register object *base=vs_top; object  V211 ,V210 ,V209 ,V208 ,V207 ,V203;
  102. #define VMS25 vs_top += 3;
  103. #define VMV25 vs_reserve(3);
  104. #define VMR25(VMT25) vs_top=base ; return(VMT25);
  105. static object LI26();
  106. #define VMB26 register object *base=vs_top; object  V232 ,V231 ,V230 ,V229 ,V228 ,V227 ,V226 ,V225 ,V224 ,V223 ,V222;
  107. #define VMS26  register object *sup=vs_top+7;vs_top=sup;
  108. #define VMV26 vs_reserve(7);
  109. #define VMR26(VMT26) vs_top=base ; return(VMT26);
  110. static object LI27();
  111. #define VMB27 register object *base=vs_top; object  V252 ,V251 ,V250 ,V249 ,V248 ,V246 ,V245;
  112. #define VMS27 vs_top += 2;
  113. #define VMV27 vs_reserve(2);
  114. #define VMR27(VMT27) vs_top=base ; return(VMT27);
  115. static object LI28();
  116. #define VMB28 register object *base=vs_top; object  V269 ,V268 ,V267 ,V266;
  117. #define VMS28 vs_top += 2;
  118. #define VMV28 vs_reserve(2);
  119. #define VMR28(VMT28) vs_top=base ; return(VMT28);
  120. static object LI29();
  121. #define VMB29 register object *base=vs_top; object  V279 ,V278 ,V277 ,V276;
  122. #define VMS29 vs_top += 1;
  123. #define VMV29 vs_reserve(1);
  124. #define VMR29(VMT29) vs_top=base ; return(VMT29);
  125. static object LI30();
  126. #define VMB30 register object *base=vs_top; object  V307 ,V306 ,V305 ,V304 ,V303 ,V302 ,V301 ,V300;
  127. #define VMS30 vs_top += 6;
  128. #define VMV30 vs_reserve(6);
  129. #define VMR30(VMT30) vs_top=base ; return(VMT30);
  130. static object LI31();
  131. #define VMB31 register object *base=vs_top; object  V341 ,V340 ,V338 ,V337 ,V335 ,V334 ,V333 ,V332 ,V331 ,V330 ,V329 ,V328 ,V327 ,V325 ,V321 ,V320 ,V319 ,V317 ,V316 ,V315;
  132. #define VMS31  register object *sup=vs_top+2;vs_top=sup;
  133. #define VMV31 vs_reserve(2);
  134. #define VMR31(VMT31) vs_top=base ; return(VMT31);
  135. #define VC32 object  V348 ,V347 ,V346 ,V345;
  136. static object LI33();
  137. #define VMB33
  138. #define VMS33
  139. #define VMV33
  140. #define VMR33(VMT33) return(VMT33);
  141. #define VC34 object  V367 ,V361 ,V357;
  142. static object LI35();
  143. #define VMB35 register object *base=vs_top;
  144. #define VMS35  register object *sup=vs_top+2;vs_top=sup;
  145. #define VMV35 vs_reserve(2);
  146. #define VMR35(VMT35) vs_top=base ; return(VMT35);
  147. static object LI36();
  148. #define VMB36 object  V377;
  149. #define VMS36
  150. #define VMV36
  151. #define VMR36(VMT36) return(VMT36);
  152. static object LI37();
  153. #define VMB37 object  V385 ,V384;
  154. #define VMS37
  155. #define VMV37
  156. #define VMR37(VMT37) return(VMT37);
  157. #define VM37 0
  158. #define VM36 0
  159. #define VM35 2
  160. #define VM34 10
  161. #define VM33 0
  162. #define VM32 6
  163. #define VM31 2
  164. #define VM30 6
  165. #define VM29 1
  166. #define VM28 2
  167. #define VM27 2
  168. #define VM26 7
  169. #define VM25 3
  170. #define VM24 0
  171. #define VM23 1
  172. #define VM22 5
  173. #define VM21 0
  174. #define VM20 1
  175. #define VM19 2
  176. #define VM18 5
  177. #define VM17 3
  178. #define VM16 5
  179. #define VM15 3
  180. #define VM14 1
  181. #define VM13 1
  182. #define VM12 7
  183. #define VM11 10
  184. #define VM10 7
  185. #define VM9 4
  186. #define VM8 5
  187. #define VM7 3
  188. #define VM6 0
  189. #define VM5 0
  190. #define VM4 2
  191. #define VM3 0
  192. #define VM2 2
  193. #define VM1 0
  194. static char * VVi[179]={
  195. #define Cdata VV[178]
  196. (char *)(LI1),
  197. (char *)(LI2),
  198. (char *)(LI3),
  199. (char *)(LI4),
  200. (char *)(LI5),
  201. (char *)(LI6),
  202. (char *)(L7),
  203. (char *)(L8),
  204. (char *)(L9),
  205. (char *)(L10),
  206. (char *)(L11),
  207. (char *)(L12),
  208. (char *)(LI13),
  209. (char *)(LI14),
  210. (char *)(L15),
  211. (char *)(LI16),
  212. (char *)(LI17),
  213. (char *)(LI18),
  214. (char *)(LI19),
  215. (char *)(LI20),
  216. (char *)(LI21),
  217. (char *)(L22),
  218. (char *)(LI23),
  219. (char *)(LI24),
  220. (char *)(LI25),
  221. (char *)(LI26),
  222. (char *)(LI27),
  223. (char *)(LI28),
  224. (char *)(LI29),
  225. (char *)(LI30),
  226. (char *)(LI31),
  227. (char *)(L32),
  228. (char *)(LI33),
  229. (char *)(L34),
  230. (char *)(LI35),
  231. (char *)(LI36),
  232. (char *)(LI37)
  233. };
  234. #define VV ((object *)VVi)
  235. static object  LnkTLI177() ;
  236. static object  (*LnkLI177)() = LnkTLI177;
  237. static object  LnkTLI176() ;
  238. static object  (*LnkLI176)() = LnkTLI176;
  239. static object  LnkTLI175() ;
  240. static object  (*LnkLI175)() = LnkTLI175;
  241. static object  LnkTLI174() ;
  242. static object  (*LnkLI174)() = LnkTLI174;
  243. static object  LnkTLI173() ;
  244. static object  (*LnkLI173)() = LnkTLI173;
  245. static object  LnkTLI172() ;
  246. static object  (*LnkLI172)() = LnkTLI172;
  247. static object  LnkTLI171() ;
  248. static object  (*LnkLI171)() = LnkTLI171;
  249. static object  LnkTLI170() ;
  250. static object  (*LnkLI170)() = LnkTLI170;
  251. static object  LnkTLI169() ;
  252. static object  (*LnkLI169)() = LnkTLI169;
  253. static object  LnkTLI168() ;
  254. static object  (*LnkLI168)() = LnkTLI168;
  255. static object  LnkTLI167() ;
  256. static object  (*LnkLI167)() = LnkTLI167;
  257. static object  LnkTLI166() ;
  258. static object  (*LnkLI166)() = LnkTLI166;
  259. static object  LnkTLI165() ;
  260. static object  (*LnkLI165)() = LnkTLI165;
  261. static  LnkT164() ;
  262. static  (*Lnk164)() = LnkT164;
  263. static object  LnkTLI163() ;
  264. static object  (*LnkLI163)() = LnkTLI163;
  265. static object  LnkTLI162() ;
  266. static object  (*LnkLI162)() = LnkTLI162;
  267. static object  LnkTLI161() ;
  268. static object  (*LnkLI161)() = LnkTLI161;
  269. static object  LnkTLI160() ;
  270. static object  (*LnkLI160)() = LnkTLI160;
  271. static object  LnkTLI159() ;
  272. static object  (*LnkLI159)() = LnkTLI159;
  273. static object  LnkTLI158() ;
  274. static object  (*LnkLI158)() = LnkTLI158;
  275. static object  LnkTLI157() ;
  276. static object  (*LnkLI157)() = LnkTLI157;
  277. static  LnkT156() ;
  278. static  (*Lnk156)() = LnkT156;
  279. static object  LnkTLI154() ;
  280. static object  (*LnkLI154)() = LnkTLI154;
  281. static object  LnkTLI152() ;
  282. static object  (*LnkLI152)() = LnkTLI152;
  283. static object  LnkTLI151() ;
  284. static object  (*LnkLI151)() = LnkTLI151;
  285. static object  LnkTLI150() ;
  286. static object  (*LnkLI150)() = LnkTLI150;
  287. static object  LnkTLI149() ;
  288. static object  (*LnkLI149)() = LnkTLI149;
  289. static  LnkT148() ;
  290. static  (*Lnk148)() = LnkT148;
  291. static object  LnkTLI32() ;
  292. static object  (*LnkLI32)() = LnkTLI32;
  293. static object  LnkTLI147() ;
  294. static object  (*LnkLI147)() = LnkTLI147;
  295. static object  LnkTLI146() ;
  296. static object  (*LnkLI146)() = LnkTLI146;
  297. static object  LnkTLI145() ;
  298. static object  (*LnkLI145)() = LnkTLI145;
  299. static object  LnkTLI144() ;
  300. static object  (*LnkLI144)() = LnkTLI144;
  301. static object  LnkTLI143() ;
  302. static object  (*LnkLI143)() = LnkTLI143;
  303. static object  LnkTLI142() ;
  304. static object  (*LnkLI142)() = LnkTLI142;
  305. static object  LnkTLI141() ;
  306. static object  (*LnkLI141)() = LnkTLI141;
  307. static object  LnkTLI140() ;
  308. static object  (*LnkLI140)() = LnkTLI140;
  309. static  LnkT139() ;
  310. static  (*Lnk139)() = LnkT139;
  311. static object  LnkTLI138() ;
  312. static object  (*LnkLI138)() = LnkTLI138;
  313. static  LnkT137() ;
  314. static  (*Lnk137)() = LnkT137;
  315. static object  LnkTLI136() ;
  316. static object  (*LnkLI136)() = LnkTLI136;
  317. static object  LnkTLI135() ;
  318. static object  (*LnkLI135)() = LnkTLI135;
  319. static object  LnkTLI134() ;
  320. static object  (*LnkLI134)() = LnkTLI134;
  321. static  LnkT133() ;
  322. static  (*Lnk133)() = LnkT133;
  323. static object  LnkTLI132() ;
  324. static object  (*LnkLI132)() = LnkTLI132;
  325. static object  LnkTLI131() ;
  326. static object  (*LnkLI131)() = LnkTLI131;
  327. static object  LnkTLI130() ;
  328. static object  (*LnkLI130)() = LnkTLI130;
  329. static object  LnkTLI129() ;
  330. static object  (*LnkLI129)() = LnkTLI129;
  331. static object  LnkTLI128() ;
  332. static object  (*LnkLI128)() = LnkTLI128;
  333. static object  LnkTLI127() ;
  334. static object  (*LnkLI127)() = LnkTLI127;
  335. static object  LnkTLI126() ;
  336. static object  (*LnkLI126)() = LnkTLI126;
  337. static object  LnkTLI125() ;
  338. static object  (*LnkLI125)() = LnkTLI125;
  339. static object  LnkTLI124() ;
  340. static object  (*LnkLI124)() = LnkTLI124;
  341. static object  LnkTLI123() ;
  342. static object  (*LnkLI123)() = LnkTLI123;
  343.